Resource Library: Multimedia/Resource Library: Multimedia.iso/hypercrd/nwmxcmsm/plltn-cs.hqx/Pollution-ce/background_2684.txt

Text File | 1991-11-26 | 4.5 KB | 218 lines

-- background: 2684 from stack: in
-- bmap block id: 3119
-- flags: 0000
-- background id: 0
-- name: Bibliography


-- part 2 (field)
-- low flags: 00
-- high flags: 0007
-- rect: left=0 top=63 right=276 bottom=510
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 21
-- text size: 12
-- style flags: 16384
-- line height: 16
-- part name:


-- part 3 (button)
-- low flags: 00
-- high flags: 0004
-- rect: left=128 top=296 right=338 bottom=177
-- title width / last selected line: 0
-- icon id / first selected line: 1004 / 1004
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  printfield ("background field 1")
end mouseUp



-- part 5 (button)
-- low flags: 00
-- high flags: 0004
-- rect: left=458 top=296 right=338 bottom=507
-- title width / last selected line: 0
-- icon id / first selected line: 20098 / 20098
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  visual effect dissolve slow to black
  wait 3
  visual effect dissolve slow
  go to stack "Database-1"
end mouseUp



-- part 6 (button)
-- low flags: 00
-- high flags: 0004
-- rect: left=293 top=296 right=338 bottom=342
-- title width / last selected line: 0
-- icon id / first selected line: 32650 / 32650
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: GoNext
----- HyperTalk script -----
on mouseUp

  visual effect scroll right
  go next
end mouseUp



-- part 7 (button)
-- low flags: 00
-- high flags: 0004
-- rect: left=238 top=296 right=338 bottom=287
-- title width / last selected line: 0
-- icon id / first selected line: 1016 / 1016
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Goprev
----- HyperTalk script -----
on mouseUp
  visual effect scroll left
  go previous
end mouseUp



-- part 8 (button)
-- low flags: 00
-- high flags: 0004
-- rect: left=73 top=296 right=338 bottom=122
-- title width / last selected line: 0
-- icon id / first selected line: 1009 / 1009
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Find
----- HyperTalk script -----
on mouseUp
  sicemfido
end mouseUp



-- part 9 (button)
-- low flags: 00
-- high flags: 0004
-- rect: left=18 top=296 right=338 bottom=67
-- title width / last selected line: 0
-- icon id / first selected line: 29114 / 29114
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: pop card
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  pop card
end mouseUp



-- part 10 (button)
-- low flags: 00
-- high flags: 0004
-- rect: left=348 top=296 right=338 bottom=397
-- title width / last selected line: 0
-- icon id / first selected line: 130 / 130
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: go to flow chart
----- HyperTalk script -----
on mouseUp
  visual effect checkerboard slow
  go to card id 12925 of stack "database-1"
  wait 10
  visual effect checkerboard slow
  go to card "flow chart" in stack "database-1"
end mouseUp



-- part 11 (button)
-- low flags: 00
-- high flags: 0004
-- rect: left=403 top=296 right=338 bottom=452
-- title width / last selected line: 0
-- icon id / first selected line: 1020 / 1020
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Help
----- HyperTalk script -----
on mouseUp
  push card
  visual effect dissolve slow to black
  wait 5
  visual effect dissolve slow
  go to card "help" of stack "database-1"
end mouseUp



-- part 12 (button)
-- low flags: 00
-- high flags: 8004
-- rect: left=425 top=7 right=58 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 22308 / 22308
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Continue search
----- HyperTalk script -----
on mouseUp
  global searchit
  answer "Do you want to search bibliographies or abstracts." with "Bibliography" or "Abstract"
  if it is "Bibliography" then
    visual effect scroll right
    go next
    find whole searchit in background fld id 1
  else
    if it is "Abstract" then
      visual effect scroll right
      go next
      find whole searchit in background fld id 2
    end if
  end if
end mouseUp